SetStandardNameFloat Subroutine

private subroutine SetStandardNameFloat(name, layer)

set the standard name of a float grid

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: name
type(grid_real), intent(inout) :: layer

Source Code

SUBROUTINE SetStandardNameFloat &
!
(name, layer)

IMPLICIT NONE

!Arguments with intent(in):
CHARACTER (LEN = *), INTENT(IN) :: name

!Arguments with intent(out):
TYPE(grid_real), INTENT(INOUT) :: layer

!------------end of declaration------------------------------------------------

layer % standard_name = name

END SUBROUTINE SetStandardNameFloat